% Sim iteration running = 770001
% N = 1024 K = 528
% List size = 1   8  16  32
% Current block error performance
%    1      0.8221     0.33557     0.25189     0.18727
% 1.25     0.67502     0.14903    0.087642    0.064226
%  1.5     0.49319    0.053022    0.034471    0.020016
% 1.75     0.28943    0.014271   0.0059905   0.0027032
%    2     0.14774   0.0026683   0.0011349  0.00043618
% 2.25    0.065164  0.00051471  0.00011558  3.8961e-05
%  2.5    0.025055  5.4545e-05  1.4286e-05  3.8961e-06
% Current bit error performance
%    1     0.10798    0.036131    0.027216    0.020365
% 1.25    0.074146    0.013814   0.0079874   0.0064846
%  1.5    0.047494   0.0044145    0.002821   0.0017059
% 1.75    0.023615   0.0010287  0.00043738  0.00017827
%    2    0.010243  0.00014074  6.1261e-05  2.5427e-05
% 2.25   0.0038202   2.363e-05  6.1934e-06  2.0095e-06
%  2.5   0.0012243  2.3072e-06  5.5342e-07  2.2383e-07
%  
%  Sim iteration running = 232001
% N = 1024 K = 528
% List size = 1  2  4
% Current block error performance
%    1     0.85052     0.66225     0.51546
% 1.25     0.70652     0.48309     0.27174
%  1.5     0.49127      0.2584     0.11641
% 1.75     0.28955     0.10881    0.040667
%    2     0.14897    0.043029    0.007861
% 2.25    0.064858    0.010949   0.0018702
%  2.5    0.024953   0.0027085   0.0003319
% Current bit error performance
%    1     0.11547    0.073625    0.055276
% 1.25    0.078562    0.044933    0.025692
%  1.5    0.046555    0.022081   0.0092933
% 1.75    0.024858   0.0078334   0.0028867
%    2    0.010126   0.0025263  0.00040228
% 2.25   0.0037166  0.00047758  7.5515e-05
%  2.5   0.0011996  9.1206e-05  1.2743e-05
snr = 1 : 0.25 : 2.5;
fastcscl1 = [    0.66225     0.51546
    0.48309     0.27174
     0.2584     0.11641
     0.10881    0.040667
   0.043029    0.007861
   0.010949   0.0018702
  0.0027085   0.0003319];

fastcscl2 = [     0.33557     0.25189     0.18727
    0.14903    0.087642    0.064226
     0.053022    0.034471    0.020016
       0.014271   0.0059905   0.0027032
   0.0026683   0.0011349  0.00043618
  0.00051471  0.00011558  3.8961e-05
 5.4545e-05  1.4286e-05  3.8961e-06];

p = semilogy(snr, [fastcscl1 fastcscl2]);
grid on
p(1).Marker = 'o';
p(2).Marker = 'd';
p(3).Marker = 'p';
p(4).Marker = 'v';
p(5).Marker = 's';

p(1).Color = 'r';
p(2).Color = 'g';
p(3).Color = 'm';

for k = 1 : 5
    p(k).MarkerSize = 8;
    p(k).LineWidth = 1.1;
end
l = legend('L = 2',...
    'L = 4',...
    'L = 8',...
    'L = 16',...
    'L = 32');

l.Location = 'SouthWest';

xlabel('E_b/N_0 (dB)')
ylabel('BLER')
set(gca, 'fontname', 'times new roman', 'fontsize', 16)